perm filename FORER.SAI[PIC,HE] blob sn#430356 filedate 1979-04-03 generic text, type T, neo UTF8
ENTRY FORER!;
BEGIN "FORER"
SIMPLE INTERNAL INTEGER PROCEDURE FORER!;
	PRINT("FORTRAN ERROR!!");
END;